unit fmcw_SupplyBalanceEdit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, ActnList, ComCtrls, ToolWin, Grids, DBGridEh,
  DBCtrlsEh, StdCtrls, Mask, DBCtrls, ExtCtrls, fmBillModule, Menus,
  fmSimpleEdit;

type
  Tfrmcw_SupplyBalanceEdit = class(TfrmSimpleEdit)
    Panel1: TPanel;
    Panel2: TPanel;
    Label1: TLabel;
    Label9: TLabel;
    DBEditEh2: TDBEditEh;
    DBEditEh3: TDBEditEh;
    Panel3: TPanel;
    Label18: TLabel;
    Label19: TLabel;
    Label17: TLabel;
    Label21: TLabel;
    Label16: TLabel;
    Label20: TLabel;
    DBEdit4: TDBEdit;
    DBEdit5: TDBEdit;
    DBEdit7: TDBEdit;
    DBEdit9: TDBEdit;
    DBEdit6: TDBEdit;
    DBEdit8: TDBEdit;
    Label2: TLabel;
    DBEditEh7: TDBEditEh;
    Label11: TLabel;
    DBEditEh11: TDBEditEh;
    Label3: TLabel;
    DBEditEh1: TDBEditEh;
  private
    { Private declarations }
  protected
    {protected declarations}
    procedure FormInit; override;
    procedure DataModuleInit;override;
  public
    { Public declarations }
  end;

var
  frmcw_SupplyBalanceEdit: Tfrmcw_SupplyBalanceEdit;

implementation

uses dmcw_SupplyBalance;

{$R *.dfm}

{ Tfrmcw_SupplyBalanceEdit }

procedure Tfrmcw_SupplyBalanceEdit.DataModuleInit;
begin
  inherited;
  FDataModuleClass := Tdtmcw_SupplyBalance;
end;

procedure Tfrmcw_SupplyBalanceEdit.FormInit;
begin
  DataSource1.DataSet := Tdtmcw_SupplyBalance(FDataModule).adsMasterEdit;
  inherited;
end;

end.
